package com.qd.panda.service.discount;

import cn.hutool.core.exceptions.ExceptionUtil;
import com.baomidou.mybatisplus.core.conditions.query.QueryWrapper;
import com.cdqidi.constant.ConstantDto;
import com.cdqidi.db.BaseService;
import com.cdqidi.dto.CacheKey;
import com.cdqidi.exception.ApiException;
import com.cdqidi.util.RedisTemplateUtil;
import com.cdqidi.util.SpringContextHolder;
import com.cdqidi.util.ValidatorUtil;
import com.cdqidi.valid.group.DefaultGroup;
import com.cdqidi.valid.group.UpdateGroup;
import com.qd.common.panda.constant.PandaConstant;
import com.qd.common.panda.domain.entity.discount.ThirdPartyOfferDTO;
import com.qd.common.sys.domain.entity.log.SendLogDTO;
import com.qd.common.sys.event.SendLogEvent;
import com.qd.panda.gas.discount.autohome.AutoHomeHttpServiceImpl;
import com.qd.panda.mapper.discount.ThirdPartyOfferMapper;
import com.qd.panda.model.ThirdPartyOffer;
import lombok.RequiredArgsConstructor;
import lombok.extern.slf4j.Slf4j;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;
import org.springframework.util.StringUtils;

import java.math.BigDecimal;
import java.time.LocalDateTime;
import java.util.Arrays;
import java.util.Collections;
import java.util.List;
import java.util.Optional;

import static java.util.stream.Collectors.toList;

/**
 * 存储第三方优惠信息
 *
 * @author sjk
 */
@RequiredArgsConstructor
@Service
@Slf4j
public class ThirdPartyOfferService extends BaseService<ThirdPartyOfferMapper, ThirdPartyOffer> {

    private static final String PREFIX_ID = "panda_third_party_offer_platform_{0}";

    private final RedisTemplateUtil<ThirdPartyOffer> redisTemplateUtil;
    private final ValidatorUtil validatorUtil;

    private final AutoHomeHttpServiceImpl autoHomeHttpService;

    /**
     * 添加或者更新
     *
     * @param dto 页面对象
     */
    @Transactional(rollbackFor = Exception.class)
    public void saveOrUpdate(ThirdPartyOfferDTO dto) {
        if (Boolean.TRUE.equals(isExistsById(dto.getPlatform()))) {
            validatorUtil.checkValid(dto, DefaultGroup.class, UpdateGroup.class);
            update(dto);
        } else {
            validatorUtil.checkValid(dto, DefaultGroup.class);
            save(dto);
        }
    }

    /**
     * 保存
     *
     * @param dto 页面对象
     * @return 页面对象
     */
    @Transactional(rollbackFor = Exception.class)
    public ThirdPartyOfferDTO save(ThirdPartyOfferDTO dto) {
        final ThirdPartyOffer model = dtoToModel(dto);
        try {
            if (super.save(model)) {
                return modelToDto(model);
            }
            throw new ApiException("添加失败");
        } finally {
            clearCache(model);
            model.freeData();
        }
    }

    /**
     * 修改
     *
     * @param dto 页面对象
     * @return 页面对象
     */
    @Transactional(rollbackFor = Exception.class)
    public ThirdPartyOfferDTO update(ThirdPartyOfferDTO dto) {
        final ThirdPartyOffer historyModel = Optional.ofNullable(getById(dto.getPlatform())).orElseThrow(() -> new ApiException("ID不存在,不能更新"));
        final ThirdPartyOffer model = dtoToModel(dto);
        try {
            if (super.updateById(model)) {
                return modelToDto(model);
            }
            throw new ApiException("更新失败");
        } finally {
            clearCache(historyModel);
            historyModel.freeData();
            model.freeData();
        }
    }

    /**
     * 批量添加
     *
     * @param mList 数据库对象
     */
    @Transactional(rollbackFor = Exception.class)
    public void saveBatch(List<ThirdPartyOffer> mList) {
        try {
            if (!super.saveBatch(mList)) {
                throw new ApiException("批量添加失败");
            }
        } finally {
            clearCaches(mList);
        }
    }

    /**
     * 批量更新
     *
     * @param mList 数据库对象
     */
    @Transactional(rollbackFor = Exception.class)
    public void updateBatchIds(List<ThirdPartyOffer> mList) {
        final List<Integer> ids = mList.stream().map(ThirdPartyOffer::getPlatform).collect(toList());
        final List<ThirdPartyOffer> historyModelList = checkIds(ids);
        try {
            if (!super.updateBatchById(mList)) {
                throw new ApiException("批量更新失败");
            }
        } finally {
            clearCaches(historyModelList);
            historyModelList.clear();
            ids.clear();
        }
    }

    /**
     * 删除，单个
     *
     * @param platform 主键
     */
    @Transactional(rollbackFor = Exception.class)
    public void removeById(Integer platform) {
        final ThirdPartyOffer historyModel = Optional.ofNullable(getById(platform)).orElseThrow(() -> new ApiException("数据不存在,不能删除"));
        try {
            if (!super.removeById(platform)) {
                throw new ApiException("删除失败");
            }
        } finally {
            clearCache(historyModel);
            historyModel.freeData();
        }
    }

    /**
     * 批量删除
     *
     * @param ids 主键集合
     */
    @Transactional(rollbackFor = Exception.class)
    public void removeBatchIds(List<Integer> ids) {
        final List<ThirdPartyOffer> historyModelList = checkIds(ids);
        try {
            if (!super.removeByIds(ids)) {
                throw new ApiException("批量删除失败");
            }
        } finally {
            clearCaches(historyModelList);
            historyModelList.clear();
        }
    }

    /**
     * 根据传入对象构建查询参数，判断是否存在
     *
     * @param dto 参数
     * @return 存在为true
     */
    @Transactional(readOnly = true)
    public Boolean isExists(ThirdPartyOfferDTO dto) {
        final QueryWrapper<ThirdPartyOffer> queryWrapper = createQueryWrapper(dto);
        final boolean exists = super.count(queryWrapper) > 0;
        queryWrapper.clear();
        return exists;
    }

    /**
     * 根据主键判断数据是否存在
     *
     * @param platform 主键
     * @return 存在为true
     */
    @Transactional(readOnly = true)
    public Boolean isExistsById(Integer platform) {
        boolean exists = false;
        if (null != platform) {
            final ThirdPartyOffer model = getById(platform);
            exists = (null != model);
            if (exists) {
                model.freeData();
            }
        }
        return exists;
    }

    /**
     * 根据主键获取数据
     *
     * @param platform 主键
     * @return 单条记录
     */
    @Transactional(readOnly = true)
    public ThirdPartyOffer getById(Integer platform) {
        final String key = RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, platform);
        return redisTemplateUtil.get(new CacheKey().setKey(key).setTimeout(ConstantDto.REDIS_TIME_OUT_DAY), () -> super.getById(platform), ThirdPartyOffer.class);
    }

    /**
     * 根据主键获取数据
     *
     * @param platform 主键
     * @return 单条记录，转换成页面对象
     */
    @Transactional(readOnly = true)
    public ThirdPartyOfferDTO getByIdDto(Integer platform) {
        return Optional.ofNullable(getById(platform)).map(this::modelToDto).orElse(null);
    }

    /**
     * 根据条件查询单条数据
     *
     * @param dto 查询参数
     * @return 单条记录
     */
    @Transactional(readOnly = true)
    public ThirdPartyOffer getOne(ThirdPartyOfferDTO dto) {
        final QueryWrapper<ThirdPartyOffer> queryWrapper = createQueryWrapper(dto);
        ThirdPartyOffer model = super.getOne(queryWrapper);
        queryWrapper.clear();
        return model;
    }

    /**
     * 根据条件查询单条数据
     *
     * @param dto 查询参数
     * @return 单条记录，转换成页面对象
     */
    @Transactional(readOnly = true)
    public ThirdPartyOfferDTO getOneDto(ThirdPartyOfferDTO dto) {
        return Optional.ofNullable(getOne(dto)).map(this::modelToDto).orElse(null);
    }

    /**
     * 根据条件查询列表数据
     *
     * @param dto 查询参数
     * @return 列表数据
     */
    @Transactional(readOnly = true)
    public List<ThirdPartyOffer> getList(ThirdPartyOfferDTO dto) {
        final QueryWrapper<ThirdPartyOffer> queryWrapper = createQueryWrapper(dto);
        final List<ThirdPartyOffer> list = super.list(queryWrapper);
        queryWrapper.clear();
        return list;
    }

    /**
     * 根据条件查询列表数据
     *
     * @param dto 查询参数
     * @return 列表数据，转换成页面对象
     */
    @Transactional(readOnly = true)
    public List<ThirdPartyOfferDTO> getListDto(ThirdPartyOfferDTO dto) {
        return modelToDtoList(getList(dto));
    }

    /**
     * 清空缓存
     *
     * @param model 数据库对象
     */
    public void clearCache(ThirdPartyOffer model) {
        if (null == model) {
            return;
        }
        redisTemplateUtil.deleteByKey(RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, model.getPlatform()));
        clearScanKey();
    }

    /**
     * 批量清空缓存
     *
     * @param list 数据库对象
     */
    public void clearCaches(List<ThirdPartyOffer> list) {
        if (null == list || list.isEmpty()) {
            return;
        }
        List<String> ids = list.stream().map(model -> RedisTemplateUtil.getRedisCacheKey(PREFIX_ID, model.getPlatform())).collect(toList());
        if (!ids.isEmpty()) {
            redisTemplateUtil.deleteByKey(ids);
            ids.clear();
        }
        clearScanKey();
    }

    private void clearScanKey() {
        String scanKey = CarParkGasStationDiscountSetService.SCAN_ID_AMOUNT.replace("_{0}","");
        Optional.ofNullable(redisTemplateUtil.scan(scanKey)).ifPresent(keys -> redisTemplateUtil.getStringRedisTemplate().delete(keys));
    }

    /**
     * 数据库对象转页面对象
     *
     * @param model 数据库对象
     * @return 页面对象
     */
    public ThirdPartyOfferDTO modelToDto(ThirdPartyOffer model) {
        if (null == model) {
            return null;
        }
        final ThirdPartyOfferDTO dto = new ThirdPartyOfferDTO();
        dto.setPlatform(model.getPlatform());
        dto.setContent(model.getContent());
        dto.setOperatorTime(model.getOperatorTime());
        return dto;
    }

    /**
     * 页面对象转数据库对象
     *
     * @param dto 页面对象
     * @return 数据库对象
     */
    public ThirdPartyOffer dtoToModel(ThirdPartyOfferDTO dto) {
        if (null == dto) {
            return null;
        }
        final ThirdPartyOffer model = new ThirdPartyOffer();
        model.setPlatform(dto.getPlatform());
        model.setContent(dto.getContent());
        model.setOperatorTime(dto.getOperatorTime());
        return model;
    }

    /**
     * 数据库对象转页面对象
     *
     * @param list 数据库对象
     * @return 页面对象
     */
    public List<ThirdPartyOfferDTO> modelToDtoList(List<ThirdPartyOffer> list) {
        return Optional.ofNullable(list).orElse(Collections.emptyList()).stream().map(this::modelToDto).collect(toList());
    }

    /**
     * 页面对象转数据库对象
     *
     * @param list 页面对象
     * @return 数据库对象
     */
    public List<ThirdPartyOffer> dtoToModelList(List<ThirdPartyOfferDTO> list) {
        return Optional.ofNullable(list).orElse(Collections.emptyList()).stream().map(this::dtoToModel).collect(toList());
    }

    /**
     * 拼装查询参数，除了主键的其他字段会自动加入进来
     *
     * @param dto 查询参数，不为空的属性会被自动加入
     */
    public QueryWrapper<ThirdPartyOffer> createQueryWrapper(ThirdPartyOfferDTO dto) {
        return createQueryWrapper(dto, "");
    }

    /**
     * 拼装查询参数，除了主键的其他字段会自动加入进来
     *
     * @param dto        查询参数，不为空的属性会被自动加入
     * @param tableAlias 表别名
     */
    public QueryWrapper<ThirdPartyOffer> createQueryWrapper(ThirdPartyOfferDTO dto, String tableAlias) {
        final QueryWrapper<ThirdPartyOffer> queryWrapper = new QueryWrapper<>();
        if (null != dto) {
            if (StringUtils.hasLength(tableAlias) && tableAlias.charAt(tableAlias.length() - 1) != '.') {
                tableAlias += ".";
            }
        }
        return queryWrapper;
    }

    /**
     * 批量检查主键在数据库中是否存在
     *
     * @param ids 主键集合
     * @return 主键查询出来的集合
     */
    public List<ThirdPartyOffer> checkIds(List<Integer> ids) {
        if (null == ids || ids.isEmpty()) {
            throw new ApiException("ids不能为空");
        }
        final List<ThirdPartyOffer> list = super.listByIds(ids);
        if (list.isEmpty()) {
            throw new ApiException("ids不存在" + Arrays.toString(ids.toArray()));
        }
        if (ids.size() == list.size()) {
            return list;
        }
        List<Integer> dbIds = list.stream().map(ThirdPartyOffer::getPlatform).collect(toList());
        final List<Integer> notExistsList = ids.stream().filter(id -> !dbIds.contains(id)).collect(toList());
        dbIds.clear();
        if (!notExistsList.isEmpty()) {
            throw new ApiException("ids不存在" + Arrays.toString(notExistsList.toArray()));
        }
        return list;
    }

    @Transactional(rollbackFor = Exception.class)
    public void sync() {
        SendLogDTO sendLogDTO = new SendLogDTO();
        sendLogDTO.setSendState(ConstantDto.SF1);
        sendLogDTO.setLogType(PandaConstant.LOG_TYPE_SYNC_AUTO_HOME_DISCOUNT);
        sendLogDTO.setAddTime(LocalDateTime.now());
        try {
            try {
                final BigDecimal bigDecimal = autoHomeHttpService.toDay(sendLogDTO);
                ThirdPartyOfferDTO thirdPartyOfferDTO = new ThirdPartyOfferDTO();
                thirdPartyOfferDTO.setContent(bigDecimal.toPlainString());
                thirdPartyOfferDTO.setPlatform(PandaConstant.PLATFORM_AUTO_HOME);
                thirdPartyOfferDTO.setOperatorTime(LocalDateTime.now());
                saveOrUpdate(thirdPartyOfferDTO);
                thirdPartyOfferDTO.freeData();
            } finally {
                SpringContextHolder.publishEvent(new SendLogEvent(sendLogDTO));
            }
        } catch (Exception e) {
            final String message = ExceptionUtil.getMessage(e);
            sendLogDTO.setErrMsg(message);
            sendLogDTO.setSendState(ConstantDto.SF0);
            throw e;
        }
    }

    /**
     * 获得平台的折扣信息
     *
     * @param platform 1表示汽车之家
     * @return 折扣率
     */
    @Transactional(readOnly = true)
    public Double getDiscount(Integer platform) {
        final ThirdPartyOffer partyOffer = getById(platform);
        if (null == partyOffer) {
            return null;
        }
        return (1 - Double.parseDouble(partyOffer.getContent())) * 100;
    }

}